home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 1 / Amiga Tools.iso / rexx / autologin.term next >
Text File  |  1994-06-06  |  2KB  |  82 lines
  1. /** $VER: Autologin.term 1.1 (2.2.93)
  2.  **
  3.  ** Führt einen Auto-Login in eine Mailbox durch.
  4.  **
  5.  ** Geschrieben von Olaf `Olsen' Barthel
  6.  **
  7.  ** Um dieses Programm zu verwenden, sollte man das
  8.  ** Telefonbuch öffnen, den Telefonbucheintrag anwählen,
  9.  ** der dieses Programm benutzen soll, den Einstellungen
  10.  ** `Commands...' öffnen und unter `Startup-/Login macro'
  11.  ** eintippen:
  12.  **
  13.  **    \a Autologin <Namenstext>,<Kennworttext>
  14.  **
  15.  ** Bitte nicht die in eckigen Klammern eingeschlossenen
  16.  ** Worte mit eingeben, stattdessen sollten an dieser Stelle
  17.  ** die Texte eingegeben werden, die die Gegenstelle schickt,
  18.  ** wenn der Anwender ihren/seinen Namen und ihr/sein Kennwort
  19.  ** eingeben soll. Schickt die Mailbox beim Login den Text
  20.  ** `Username:', wenn der Name des Anwenders einzugeben ist
  21.  ** und `Passwort:', wenn das Benutzerkennwort einzugeben ist,
  22.  ** würde man folgende Zeile eingeben:
  23.  **
  24.  **    \a Autologin Username:,Passwort:
  25.  **
  26.  ** Die Zeile bitte exakt wie oben beschrieben eintippen, das
  27.  ** Komma darf nicht weggelassen werden!
  28.  **
  29.  ** Nun bitte die `User/Password...' Einstellungen ändern,
  30.  ** sodaß der zu verwendende Benutzername und das Benutzer-
  31.  ** kennwort korrekt eingetragen sind.
  32.  **
  33.  ** Jetzt die Telefonbuchdatei abspeichern und diese Datei
  34.  ** in die Schublade "REXX:" kopieren.
  35.  **/
  36.  
  37.     /* Die Wartezeit auf zehn Sekunden setzen. */
  38.  
  39. TIMEOUT 10
  40.  
  41.     /* Die beiden Parameter einlesen. */
  42.  
  43. PARSE ARG userprompt ',' passwordprompt
  44.  
  45.     /* Auf die Frage nach dem Benutzernamen warten. */
  46.  
  47. WAIT userprompt
  48.  
  49.     /* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
  50.  
  51. IF rc ~= 0 THEN EXIT
  52.  
  53.     /* Eine Sekunde warten... */
  54.  
  55. DELAY 1
  56.  
  57.     /* Den Benutzernamen abschicken, einen Zeilenrücklauf
  58.      * hinzugeben.
  59.      */
  60.  
  61. SEND '\u\r'
  62.  
  63.     /* Auf die Frage nach dem Benutzerkennwort warten. */
  64.  
  65. WAIT passwordprompt
  66.  
  67.     /* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
  68.  
  69. IF rc ~= 0 THEN EXIT
  70.  
  71.     /* Eine Sekunde warten... */
  72.  
  73. DELAY 1
  74.  
  75.     /* Das Benutzerkennwort abschicken, einen Zeilenrücklauf
  76.      * hinzugeben.
  77.      */
  78.  
  79. SEND '\p\r'
  80.  
  81.     /* Das war alles! */
  82.